(rmail-new-summary-1): Don't show zero count of summary lines.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 3c9d3e547099e8a63bdc158c78bf1e1e243d30e6..c35e4856f9c5893fe3921a2d3b2d0542a66d9efd 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -291,7 +291,8 @@ message."
                                    summary-msgs))))
                  (setq msgnum (1+ msgnum))
                  ;; Provide a periodic User progress message.
-                 (if (zerop (% rmail-new-summary-line-count 10))
+                 (if (and (not (zerop rmail-new-summary-line-count))
+                          (zerop (% rmail-new-summary-line-count 10)))
                      (message "Computing summary lines...%d"
                               rmail-new-summary-line-count)))
                (setq summary-msgs (nreverse summary-msgs)))